program test

    implicit none
    write(*, "('duyu', (I4))") 1
    write(*,*) 'duyu', 1
end program test
